home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1996 #5 / Amiga Plus CD - 1996 - No. 5.iso / pd / grafik / adpro_scripts / operators / doublewidth_ < prev    next >
Text File  |  1996-04-20  |  371b  |  21 lines
  1. /*$VER: DoubleWidth_ 1.01 (21.04.96)© Felix Coronado
  2. */
  3.  
  4. ADDRESS "ADPro"
  5. OPTIONS RESULTS
  6. NL='0A'x
  7. IMAGE_TYPE
  8. IF ADPro_Result='BITPLANE' THEN DO
  9.  ADPRO_TO_FRONT
  10.  OKAY1 "There is no 8 or 24 bit"||NL||,
  11.        "data to scale."||NL||,
  12.        "Try loading"||NL||,
  13.        "data from disk."
  14.  EXIT
  15. END
  16. PCT_SCALE 200 100
  17. IF rc=10 THEN DO
  18.  ADPRO_TO_FRONT
  19.  OKAY1 "Scale failed"
  20. END
  21.